CAAPlanetPerihelionAphelion_MarsAphelion <-
function(k){
.Call("CAAPlanetPerihelionAphelion_MarsAphelion", k)
}
